home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / jaz_clib.arc / JZRGTSTR.C < prev    next >
Text File  |  1989-04-09  |  585b  |  26 lines

  1. /*
  2. ┌────────────────────────────────────────────────────────────────────────────┐
  3. │ jzrgtstr                                     │
  4. │ Return the right n chars from a string                     │
  5. │                                         │
  6. │ (C) JazSoft Software by Jack A. Zucker (301) 794-5950              │
  7. └────────────────────────────────────────────────────────────────────────────┘
  8. */
  9.  
  10. char *jzrgtstr(fstr,fnum)
  11. char *fstr;
  12. int fnum;
  13. {
  14.   unsigned int w,wlen;
  15.   char *wptr;
  16.  
  17.   w = (int) fstr;
  18.  
  19.   wlen = strlen(fstr);
  20.  
  21.   wptr = (char *) w + wlen - fnum;
  22.  
  23.   return( (char *) ((int) (wptr) >= (int) (fstr)) ? wptr : fstr);
  24.  
  25. }
  26.